home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / program / swagg_m.zip / MEMORY.SWG / 0058_Flush Smartdrv.pas < prev    next >
Pascal/Delphi Source File  |  1994-08-24  |  226b  |  20 lines
  1.  
  2.  
  3. Uses Dos;
  4.  
  5. Procedure Flush_Cache;
  6. { This will work with SmartDrive 4.00+ and PC-Cache 8.0+. }
  7.  
  8. Var Reg: Registers;
  9.  
  10. Begin
  11.   Reg.AX:=$4A10;
  12.   Reg.BX:=$0001;
  13.   Intr($2F,Reg);
  14. End;
  15.  
  16. BEGIN
  17. Flush_Cache;
  18. END.
  19.  
  20.